perm filename XXX[BNF,JRA]2 blob sn#012425 filedate 1972-11-14 generic text, type T, neo UTF8

(DEFPROP TRY 
 (LAMBDA (X) (PROG NIL (SETQ XXX (XXTRY X)) (SETQ YYY (ISIT (QUOTE (/")))) (RETURN XXX))) 
EXPR)